home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / pcboard / failc1.zip / FAILC.PPS < prev    next >
Text File  |  1996-04-13  |  436b  |  17 lines

  1. ;FailCommand v1.0    Failed Password command.
  2. ;Atlantis Software
  3. ;BBS 706-776-9276 28.8
  4. ;------------------------------------------------------------------------------
  5.  
  6.     INTEGER    VAR001
  7.  
  8.  
  9. ;------------------------------------------------------------------------------
  10.  
  11.     GETUSER 
  12.     LET VAR001=STRING(U_STAT(14))
  13.     PRINTLN "@POS:27@@X0FFailed Password Attempts: @X0E"+STRING(VAR001)
  14.     NEWLINE
  15.     WAIT
  16.     END 
  17.